C------------------------------------- VISCOSITY OF HYDROGEN -----HOT
      DATA (VIS(N,2),N=1,50)
     & /6.7950D-05, 8.0578D-05, 9.3206D-05, 1.0583D-04, 1.1846D-04,
     &  1.3109D-04, 1.4372D-04, 1.5635D-04, 1.6897D-04, 1.8160D-04,
     &  1.9423D-04, 2.0686D-04, 2.1949D-04, 2.3211D-04, 2.4474D-04,
     &  2.5737D-04, 2.7019D-04, 2.8301D-04, 2.9582D-04, 3.0864D-04,
     &  3.2146D-04, 3.3427D-04, 3.4708D-04, 3.5988D-04, 3.7269D-04,
     &  3.8550D-04, 3.9839D-04, 4.1128D-04, 4.2416D-04, 4.3705D-04,
     &  4.4994D-04, 4.5382D-04, 4.5770D-04, 4.6157D-04, 4.6545D-04,
     &  4.6933D-04, 4.6629D-04, 4.6324D-04, 4.6020D-04, 4.5715D-04,
     &  4.5411D-04, 4.5846D-04, 4.6280D-04, 4.6715D-04, 4.7149D-04,
     &  4.7584D-04, 4.8467D-04, 4.9350D-04, 5.0232D-04, 5.1115D-04/
      DATA (VIS(N,2),N=51,100)
     & /5.1998D-04, 5.3020D-04, 5.4042D-04, 5.5063D-04, 5.6085D-04,
     &  5.7107D-04, 5.8177D-04, 5.9247D-04, 6.0316D-04, 6.1386D-04,
     &  6.2456D-04, 6.3537D-04, 6.4618D-04, 6.5699D-04, 6.6780D-04,
     &  6.7861D-04, 6.8952D-04, 7.0042D-04, 7.1133D-04, 7.2223D-04,
     &  7.3314D-04, 7.4396D-04, 7.5477D-04, 7.6559D-04, 7.7640D-04,
     &  7.8722D-04, 7.9779D-04, 8.0837D-04, 8.1894D-04, 8.2952D-04,
     &  8.4009D-04, 8.5017D-04, 8.6024D-04, 8.7032D-04, 8.8039D-04,
     &  8.9047D-04, 8.9970D-04, 9.0893D-04, 9.1816D-04, 9.2739D-04,
     &  9.3662D-04, 9.4458D-04, 9.5253D-04, 9.6049D-04, 9.6844D-04,
     &  9.7640D-04, 9.8256D-04, 9.8872D-04, 9.9488D-04, 1.0010D-03/
      DATA (VIS(N,2),N=101,150)
     & /1.0072D-03, 1.0110D-03, 1.0148D-03, 1.0186D-03, 1.0224D-03,
     &  1.0262D-03, 1.0271D-03, 1.0280D-03, 1.0288D-03, 1.0297D-03,
     &  1.0306D-03, 1.0282D-03, 1.0257D-03, 1.0233D-03, 1.0208D-03,
     &  1.0184D-03, 1.0125D-03, 1.0065D-03, 1.0006D-03, 9.9460D-04,
     &  9.8865D-04, 9.7915D-04, 9.6965D-04, 9.6015D-04, 9.5065D-04,
     &  9.4115D-04, 9.2853D-04, 9.1591D-04, 9.0330D-04, 8.9068D-04,
     &  8.7806D-04, 8.6282D-04, 8.4758D-04, 8.3234D-04, 8.1710D-04,
     &  8.0186D-04, 7.8494D-04, 7.6801D-04, 7.5109D-04, 7.3416D-04,
     &  7.1724D-04, 6.9960D-04, 6.8196D-04, 6.6433D-04, 6.4669D-04,
     &  6.2905D-04, 6.1164D-04, 5.9422D-04, 5.7681D-04, 5.5939D-04/
      DATA (VIS(N,2),N=151,201)
     & /5.4198D-04, 5.2536D-04, 5.0873D-04, 4.9211D-04, 4.7548D-04,
     &  4.5886D-04, 4.4411D-04, 4.2936D-04, 4.1462D-04, 3.9987D-04,
     &  3.8512D-04, 3.7237D-04, 3.5962D-04, 3.4688D-04, 3.3413D-04,
     &  3.2138D-04, 3.1070D-04, 3.0003D-04, 2.8935D-04, 2.7868D-04,
     &  2.6800D-04, 2.5929D-04, 2.5058D-04, 2.4188D-04, 2.3317D-04,
     &  2.2446D-04, 2.1808D-04, 2.1170D-04, 2.0531D-04, 1.9893D-04,
     &  1.9255D-04, 1.8708D-04, 1.8161D-04, 1.7614D-04, 1.7067D-04,
     &  1.6520D-04, 1.6092D-04, 1.5664D-04, 1.5235D-04, 1.4807D-04,
     &  1.4379D-04, 1.4047D-04, 1.3715D-04, 1.3382D-04, 1.3050D-04,
     &  1.2718D-04, 1.2461D-04, 1.2204D-04, 1.1947D-04, 1.1690D-04,
     &  1.1433D-04/
